class Wacky < Sketch3D
  def container
    super do
      object :class => PHelper::Camera3D do
        block do
          background 0 
          @tx = sin_bounce(400)
        end

        (0..100).each do
          line :stroke => Red do
            block { @x = r_s; @y = r_s; @z = r_s; }
          end
        end
        
        sphere(:fill => [0.3, 1, 1, 0.5], :stroke => [0.3, 1, 1, 1]) do
          block do
            @ty = sin_bounce(100) * -2 + 1
            @sy = smooth_pulse(100)
          end
          box :tx => 1
          box :tx => -1
        end
      end
    end
  end
end

